home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
FM Towns: Free Software Collection 4
/
FM Towns Free Software Collection 4 - Disc 1.iso
/
t_os
/
ashula
/
ashsmp2
/
all.a
next >
Wrap
Text File
|
1991-10-18
|
7KB
|
472 lines
set sound 0 "asi.snd"
set sound 1 "iki.snd"
set sound 2 "himei.snd"
set sound 3 "time.snd"
begin
volume pcm7 127
volume pcm8 64
screen 0 3
screen 1 3
display 0 both
string view 0 0 84 639 395 0 16 16 18 smooth
palette 0 8 1 1 1
color 0 1 8
color 1 1 0
cls 0
color 0 1 0
string clear 0
layer set 1
point set 1 384 0
display set 1 move 384 396
background@ "s1mo.pgf"
sound 1 pcm7
for 4
for 32
roll 1 0 -3 1 0
roll 1 1 1 1 0
next
sound 1 pcm7
next
cls 1
layer set 1
display set 1 move 384 84
point set 1 0 168
background@ "s2.pgf"
roll 1 0 -8 48 0
wait 500
cls 1
layer set 1
display set 1 move 0 0
point set 1 0 84
sound 0 pcm8
cast load "s3_1"
background@ "s3b1.pgf"
layer set 0
point set 0 282 254
wait sound end pcm8
sound 0 pcm8
for 10
put b-0
wait 10
put b-1
wait 10
put b-2
wait 10
put b-3
wait 10
put b-2
wait 10
put b-1
wait 10
next
wait sound end pcm8
sound 0 pcm8
clear a
point set 0 0 0
cls 0
display 0 layer0
background@ "c1.pgf"
wait sound end pcm8
cls 0
point set 0 264 220
cast load "s3_2"
volume pcm8 84
sound 0 pcm8
display 0 both
for 10
put a-0
wait 10
put a-1
wait 10
put a-2
wait 10
put a-3
wait 10
put a-2
wait 10
put a-1
wait 10
next
wait sound end pcm8
sound 0 pcm8
clear a
point set 0 0 0
cls 0
display 0 layer0
background@ "c2.pgf"
wait sound end pcm8
cls 0
point set 0 264 180
volume pcm8 100
sound 0 pcm8
display 0 both
for 10
put b-0
wait 10
put b-1
wait 10
put b-2
wait 10
put b-3
wait 10
put b-2
wait 10
put b-1
wait 10
next
wait sound end pcm8
sound 0 pcm8
clear a
point set 0 0 0
cls 0
display 0 layer0
background@ "c3.pgf"
wait sound end pcm8
cls 0
cast load "s3_1"
display 0 both
point set 0 264 140
volume pcm8 127
sound 0 pcm8
for 10
put a-0
wait 10
put a-1
wait 10
put a-2
wait 10
put a-3
wait 10
put a-2
wait 10
put a-1
wait 10
next
wait sound end pcm8
sound 0 pcm8
clear a
point set 0 0 0
cls 0
display 0 layer0
background@ "c4.pgf"
wait sound end pcm8
string view 0 0 84 639 395 0 16 16 18 smooth
palette 0 8 1 1 1
color 0 1 8
color 1 1 0
cls 0
color 0 1 0
string clear 0
cls 1
display 0 both
layer set 1
display set 1 move 0 0
point set 1 0 84
background@ "s4.pgf"
wait 500
cls 1
string view 0 0 84 639 323 0 16 16 18 smooth
color 0 1 8
cls 0
color 0 1 0
string clear 0
point set 1 0 240
display set 1 move 0 428
effect vely slow wipe up
background@ "s5p4.pgf"
effect disable
for 40
wait 5
roll 1 1 -6 1 0
next
point set 1 0 0
background@ "s5p3.pgf"
for 40
wait 5
roll 1 1 -6 1 0
next
point set 1 0 272
background@ "s5p2.pgf"
for 40
wait 5
roll 1 1 -6 1 0
next
point set 1 0 32
background@ "s5p1.pgf"
for 40
wait 5
roll 1 1 -6 1 0
next
wait 500
effect nomal dissolve
layer set 0
point set 0 0 84
background@ "title.pgf"
effect disable
wait 300
sound 2 pcm8
wipe 1 very slow dissolve
wait 500
string view 0 0 84 639 395 0 16 16 18 smooth
palette 0 8 1 1 1
color 0 1 8
color 1 1 0
cls 0
color 0 1 0
string clear 0
display set 1 move 0 84
layer set 1
point set 1 0 0
background@ "s6.pgf"
roll 1 1 -1 168 2
wait 300
color 1 1 15
wipe 1 very slow dissolve
effect very slow dissolve
display set 1 move 0 84
point set 1 0 0
background@ "s7.pgf"
effect disable
roll 1 1 -1 168 2
wait 500
color 1 1 0
cls 1
display set 1 move 0 0
point set 1 0 0
background@ "cap1.pgf"
wait 500
color 1 1 15
cls 1
effect slow wipe down
display set 1 move 0 400
layer set 1
point set 1 0 0
background@ "s8.pgf"
effect disable
roll 1 1 2 60 3
wait 400
color 1 1 0
cls 1
display set 1 move 0 0
point set 1 0 0
background@ "cap2.pgf"
wait 500
color 1 1 0
cls 1
display set 1 move 384 0
layer set 1
point set 1 0 84
effect fast wipe left
background@ "s9.pgf"
sound 3 pcm8
effect disable
for 6
roll 1 0 -2 32 2
sound 3 pcm8
next
wait sound end pcm8
sound 3 pcm8
wait sound end pcm8
sound 3 pcm8
wait sound end pcm8
color 1 1 0
cls 1
display set 1 move 0 0
point set 1 0 0
background@ "cap3.pgf"
wait 500
color 1 1 0
cls 1
display set 1 move 384 0
layer set 0
point set 0 0 84
sound 3 pcm8
cast load "s10"
palette@ 0
palette@ 1
put b-0
sound 3 pcm8
wait sound end pcm8
layer set 1
point set 1 456 236
put@ a-0
sound 3 pcm8
for 30
roll 1 0 -12 1 0
roll 1 1 10 1 0
next
sound 3 pcm8
wait sound end pcm8
sound 3 pcm8
wait sound end pcm8
color 1 1 0
cls 1
color 0 1 0
cls 0
palette 0 8 1 1 1
color 1 1 0
cls 1
display set 1 move 0 0
layer set 1
point set 1 0 0
background@ "cap4.pgf"
wait 500
color 1 1 0
cls 1
display set 1 move 0 84
zoom 1 16 16
layer set 1
point set 1 0 84
background@ "s11.pgf"
wait 8
zoom 1 15 15
wait 8
zoom 1 14 14
wait 8
zoom 1 13 13
wait 8
zoom 1 12 12
wait 8
zoom 1 11 11
wait 8
zoom 1 10 10
wait 8
zoom 1 9 9
wait 8
zoom 1 8 8
wait 8
zoom 1 7 7
wait 8
zoom 1 6 6
wait 8
display set 1 move 0 0
zoom 1 5 5
wait 8
zoom 1 4 4
wait 8
zoom 1 3 3
wait 8
zoom 1 2 2
wait 8
zoom 1 1 1
wait 200
cls 1
display set 1 move 0 0
layer set 1
point set 1 0 0
background@ "cap5.pgf"
wait 500
cast load "s12"
color 1 1 0
cls 1
color 0 1 0
cls 0
palette@ 0
palette@ 1
display set 0 move 0 0
layer set 0
point set 0 0 84
put@ a-0
wait 10
clear a
point set 0 320 84
put@ a-1
wait 10
clear a
wait 100
cls 0
point set 0 0 0
background@ "come1.pgf"
wait 700
cls 1
cls 0
palette@ 0
display set 0 move 0 0
display set 1 move 384 0
layer set 1
point set 1 0 84
put a-0
layer set 0
point set 0 704 84
put a-1
for 192
roll 1 0 -2 1 0
roll 0 0 2 1 0
next
wait 500
layer set 1
point set 1 320 84
put a-1
cls 0
display set 0 move 0 0
display set 1 move 0 0
point set 1 0 84
effect very fast horizontal open
background@ "s13.pgf"
wait 100
effect nomal vertical close
layer set 0
point set 0 0 84
background@ "title.pgf"
wait 500
cls 1
roll 0 1 -4 22 0
layer set 1
point set 1 40 80
effect nomal wipe right
background@ "come2.pgf"
volume pcm7 5
sound 1 pcm7
wait sound end pcm7
volume pcm7 25
sound 1 pcm7
wait sound end pcm7
volume pcm7 45
sound 1 pcm7
wait sound end pcm7
volume pcm7 75
sound 1 pcm7
wait sound end pcm7
volume pcm7 85
sound 1 pcm7
wait sound end pcm7
volume pcm7 105
sound 1 pcm7
wait sound end pcm7
volume pcm7 125
sound 1 pcm7
wait sound end pcm7
volume pcm7 127
sound 1 pcm7
wait sound end pcm7
volume pcm7 127
sound 1 pcm7
wait sound end pcm7
volume pcm7 127
sound 1 pcm7
wait sound end pcm7
end